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TIMEX SINCLAIR USERS GROUP 
MILE HIGH CHAPTER 


EXEEKKEEKSERAAAATEKSEAE SASK ETESSREE ALATA AA STARA TESTE TATE ES 
C/O FRANK HOLLAND, 1423 S. PEARL ST., DENVER CO 80210, 733-8103 
AUG. 1987. The meeting is on the 27th, at 7:30 PM, at my home. 
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Some of you may have noticed that the July newsletter didn’t 
got out. That was because I was in the hospital with a 
collapsed lung during the last of June. It really wasn't 
anything SERIDUS, it just took up valuable time that I could 
have devoted to something else (ANYthing else). 

Anyway, the queue got backed up (job, yard work,  love-life, 
studies, other clubs, etc) and the newsletter had to wait. 

I still have a lot of club projects to catch up on, such as 
sorting out the exchange programs from Cleveland (and getting 
Howard the Duck back home), a MC program for Shane, and copying 
numerous club programs for Rod. I've accomplished 1/2 of each 
and the summer doldrums are upon us. 

HOpPRTULEY z ENEP YEAR will ee back to normal (? ?NORMAL??) 


According to the new E. ARTHUR BROWN catalog: A&J MICRODRIVE 
won?t be building any more units, and there are SUDpEREd to be 
only. 30 drives left in stock. : 5 

We lost ‘Tom Beaman to the clutches of IBM so he is selling his 
Timex Sud i 
$175 or best offers. 

TS1000 with add-on keuBGard. 
A&I microdrive (1 drive). 
AERCO centronics IDEO TAGES 
many programs. .., : SEM 
books, SYNC & SYNTAX magazines. v D z 


1-772-2073 HOME (evenings) a 
1-772-3933 WORK 

Also, we lost Jeff Brothers to a Franklin Ace several months 
ago. Now he has donated all of his T/S library and equipment to 
the club. Some of the books will be kept for the permanent 
library and some will be for sale. The hardware will be for 
sale. 

1'11 keep you informed about what there is.... as soon as he 
gets it all hauled over here and I can get it cataloged. 


pn—--—————————-w—-————————Ó i dd 
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REPRINTED FROM "SUM" JAN °86 


2068 POWER SUPPLY: MAKE IT COOLER & QUIETER — J. W. Dowell 


I have discovered that programs SAVE’d to cassette tapes from 
the TS-2068 can have a very high noise/scratch background level 
making verification and loading a somewhat iffy proposition. 

The best way to determine if you have this problem is to 
monitor the signal on the tape aurally during loading. The 
background noise can be heard before the loader and between the 
leader and the program. If this condition creates a problem 
for you, the following will provide a solution. 

The TS-2068, when operated from a DC supply voltage of more 
than 13 volts, creates a superflous noise on the internal power 
distribution lines, probably from the action of the switching 
voltage regulator which supplies the regulated 5 volt supply. 
:' Somehow, this noise finds its way to the SPKR/TAPE output of 
the SCLD chip. For some unknown reason, if the DC supply 
voltage is less than 13 volts this noise disapears. I have 
found that a supply voltage of about 8 volts gives very good 
results. There are two drawbacks: At less than 15 volts you get 
NO COLOR output and the A&J Microdrive will not work. 

Because I sometimes wish to use the Microdrive and the 
Cassette tape storage interchangeable, as in taking programs 
from the Microdrive and giving them long term storage on the 
cheaper cassettes, I developed a voltage reducer to put in the 
cord of the TS-2068 power unit so that I can change the supply 
"voltage from the normally used 15 volts to a lower 8 volts when 
I want to SAVE a program to cassette tape. The supply voltage 
can be changed back and forth without affecting any of the 
program or data stored in memory. p ORAE 

Also, by operating the TS-2068 at a normal 15-16. volt level 
rather than the power unit?s output of about 21 volts, the heat 
dissapation in the TS-2068 is reduced considerbly. f 

The schematic for the voltage reducer is ` self-explanatory. 

Two words of caution, however. Although the regulating 
transistor, 2N3055 or similar, is capable of passing many amps 
of current, it must be well heat sinked as it  dissipates about 
5 watts wnen delivering the low voltage output. ' When cutting 
the cord of the power unit, verify the polarity of the leads 
when they are reconnected remembering that the outer contact of 
the concentric connector is positive and the inner contact is 
negative. ` 
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Cette THE RIGHT PRORORTI EINS. z 


= -—Wes'Brzozowski, SINCUS 
Before: vesding ‘too far into this, go grab a newspaper or | some 


other publication that has print laid out in narrow columns. Count 


) the number of letters ànd-blank'spaces-on several lines. |: Chances o 
= are, you'll: find ERE each pine contanw a DIPFERENI. number of '' 
characters. IET Ex Ge a 


This is ond with a —Q cal led Proportional | a m It 


turns out that fat characters like"M take take up a whole lot more 
space than the tiny letter i; so` ‘each’ character. is "given only as 
much room:as it needs. Not: only is this much >` more pleasing to ‘the. 


eye, it allows à surprising amount et extra text to be^ “Squeezed 


into the same amount of space. EE ea 


Dur. TSZO0G8s normally display 32 or 64 (ànd now 85) “columns of 
text, with' each character: ‘taking ‘up’ the- ‘Same width, no’ matter what 
its size. “It seems~-that “we 'should^ be“ able to: "improve “this 
somewhat. oa 

Actually, tte job has: already "béen' done fór us. "In the Nov. 


1985 issue of ‘YOUR SPECTRUM;' in--the, "article "Aft Out ^ of | 
Proportion", such”a program ‘ts given? Unfortunately; it “does have“ 
a number: or. defficiences. “I’ve corrected as many of ‘these ‘as “tare T 
practical (though thay can ‘stilt’ be^ annoying at times) "and > 
presented it" here for your use.” Note that the Spectrum program, and 


my perversion of it here are radically differént in many” ‘ways. ‘If 


you’ ve “got the ofa version; you? TL ‘still “have to completely’ retype — 
it for ‘the TS208B. | "Stilts they. do: "function somewhat alike» and ee ne 


NM 


might find the text of' that articte' to be helpful- 


For those" “who. have” ‘that original articles the ‘main i tévences ' 
are: 1) the code is modified to run on a TS2068,; 2? machine ‘code is’: 


initially entered through DATA »statementsy,. eliminating the need for 


a hex ‘toader, 3) the character fonts are “MUCH, ‘improved; and” you TET 


don't have to type in the pixel’ patterns ‘for "each; ` because” my 


program derives the patterns from the Timex patternss | already in. 
ROM, 4y the “code ‘works as in OVER ‘Or rather. ‘than ‘OVER i; so if ` “you * 
print over à space that already contains text, you won't get such ` 


an awful mess, and 5), the TAR, function is. also implemented, im Amer: 


proportional mode. —— Wd aeuo ien 
This articie ‘Contains two, programs; "type. in. and 'RUN the "first 


one. After a long wait, it vill SAVE, the true. ‘proportional’ printing > 


EO S Tas 


program to tape.. When, you reload. that. no. waiting — required». i 

from here on) you’ i, be E E i P RM 2 ' 
It starts out with. a little "demonstration. bf proportional" Mod. 

printing." This, redefines, the, LPRINT Command, so it. will conflict a 


with your use of a printer.. I haven't founc. this to be "any "bother > 


in the types of programs I've used it.. in. Still; if. there's" 


sufficient interest, it shouldn't. be, too hard. to produce an. add-on . 
program that inserts. a "proportional print’. channels- and ` attaches. m 


it to an unused. stream.. This, coul.d, al low.= your. , normal- printer. to 
work Cin its normal mode). in .conjection. with proportional printing." 
on the screen. In the mean time, if your printer supports a COPY 
function, that should. work with this program;, as is... a 

In: any. ‘casey LPRINT now prints to.the screen. in. proportional" 
mode, and. PRINT: continues to work. Like it always. does; so you can, 
mix BOTH methods. in. your program at, once. .- However s.. both maintain" 


M 
eoi oe 


o we 


their own separate screen.. locations, so you, can easily | print. to en 


different. parts of the screen with each. . ni 
For, Proportional screen. positionings you can use. | LPRINT AT and 
LPRINT TAB commands. However, note that. the old AT and TAB... 
11 


Vig a = d. T is em SINCE 
dunce one. use screen nodrtions- char assume. all characters are 8 
pixels. wide..This-would never do for proportional printing, so when 


you use AT or, TAB with.LPRINT, you specify the.X.and.Y locations in... 


PIXELS, not in characters. This-means you can.place.your characters. 


anywhere you. want on the screen, right down to the pixel level. The 
BASIC program, from lines 3030 on give a reasonable demonstration 
of how it works. .. 


up en 


Paes T a E 


The. YOUR SPECTRUM.. Na also. .included' "xa otont designer 
program, which is included here; „but this. is optional.. To move the. 


cursor, use the.Q,.6,.0,.and.P keys. Use M .and .N to turn a pixel on 
or off. F keeps, the design; D “displays. a character y. .U, displays , the 
entire character set and 5S and J save and l oad. the character set. 
LOAD in a.SAVEd character set to the main. program , with LOAD ""-CODE 
64208. Once loaded Linto the proportional ..print..program; ,. you can 
save the program, and, fonts. -together, and never .bother with the 
fonts again. 


The. proportional printing, fonts require, -one new thing we never. 


worried about. before; you have to specify, how- many pixel wide your 


character. is.,.To do this, you. design, your. character.. to. touch.. the DN 


right most border, of the B -8 character biock you're given. Then;.. 


in the top row of pixels, you set. each | pixel. that's l in .à valid. 


column, for that character. Thus; if your. character is. _be. five. 
pixeis wider, simply, set, the right most PN pixels. in, he. top Yr Ow. 
Cthose won't be printed on “the, screen; don?t worry de , Don't. „forget, 


to include one or, more pixels, for, the spacing . between characters! .. 


In the "standard" character. ‘sets | I’ve „chosen to have only one pixel. 
width of space between characters, "and, A "blank. space" character is. 
4 pixels wide. This. works. fairly nicely büt you san change ` it to 
suit your needs. a 


An 


, ? 
Won" t that ‘Took, nice in your next oA e aad ni say* ct teri 


xf 
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NOTES from Editors. 2 big “thanks ‘to wes, | “with “all Wes does, and. it 


fi—c o [S CET 


A, small. sample, of,” "proper tional" “printing is; Unc luded | “here. | 


E 


Ze t OP 


v: 


nee = 
Slope 


is e lot folks, Wes finds ti»e “to ` do projects for Asp. ‘Tine "Designs, a. x. 


answer a lota eil, "rite programs," "ind tipe | for” Ta»ily end of 


coarse his empioyer. ALL ‘of ” the  TS- "Pa»ily "benefits z fro». the. 


generosity of Wes,and all the others Who contribute their’ “valuable 
time and. talents. to their aser group ‘and neuslettérs and | BBSs. If 


you like being. on the receiving end of “the efforts of" datos mes 


do not contribute tine,” talent or sweat tó the efforts" of" _ «ser 
group, neusletter or BBS, there will soon be fewer or no ‘sources of. 
information. Several UGS and: zany BBSS have gaif over the” past. 


year, several newsletters have reduce their number ‘or: issues ‘and na 


replacerents are in sight. Wake up folks," smel t ut UE and', 
lend a hand before it is too late. i B EME TES 


The proportional. printing program’ wi T be ‘Uptoaded to` "BUBBS' “under” 


name of WESPPP. BAS. The font program may’ be't uploaded: "UBt' a “Vater 


date. Data on  BUBBS: 1€607)693-3359-7 days-24hours a day— "300 ‘baud on` 


from Spm. to Sam weekdays, zs hours weekeriüs- free.’ ie ci ] 


Xue ME : ass fne ens f E Ee Eee 


On pages 7 thru 10 of '5bhis idend ae in earlier^: issües, “we are 
running a printout of the TS2068 ROM disassemb!y by: Wes Brzozowski. 
We are running extra copies’ of each’ page of the: RUM" ‘Disassembly . 


that we may offer members at the conculsion of the -printout a 


complete set. With this issue we have nine sheets or: | 18° pages "of 
printout. | Our extra copy run is set at. 50, it" wiil be made" 


available on a first’: come ‘first serve- acc Suri pi minimial 


donation requested to cover postage. 
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7169 LET sminz: LET daddrzdaadr 
1170 FOR x=1 TO 8 ' 

1188 LET -5=0: LET rzPEEK daddr: 
LET daddr=daddr+i: IF rzO THEN G 
O TO 1228 

1190 IF ABS tr/2-INT (r»2))5.1 T 
HEN GO TO 1210 

1200 LET szs41: LET rsINT ir;z^, 
1): GO TO 1196 

1210 IF &$€4smin THEN LET sminss 
i220 NEXT x 

1225 IF smin=@ THEN LET sminzi 
1226 LET qzs2t(smin-1)-1: IF smin 
=1 THEN LET q=@ 

1230 POKE daddr-8,4 

1240 NEXT c 

1250 POKE 64286,15 

1250 FOR jus4204 TO 64207: POKE 


2000 BEEP 125, 1: BEEP .25,15: BE 

EP .25,1: BEEP .25,15 

2010 SAVE CHR$ 2534CHR£ 245+CHR$ 
B«"ING"«CHRS 235+"YOU" LINE 309 


e 

2828 SAVE CHRS BS2+CHRE 204«CHR£ 
ISE t THE = —-CHRS$ 175 CODE 64209, 
2025 RANDOMIZE USR 64978 

2238 GO SUB 8000 

2248 STOP 7 

S808 CLEAR 54198: LORD ""CODE 

. S818 RANDOMIZE USR 54970 

3828 GO SUB 8098 

3838 LPRINT 


` 80640 LPRINT “You can Dou NEU the 


BASIC portion auay;"' 
S650 .LPRINT "This wilt Turn Off 
the proportionat Printing..." 
S058 LPRINT "But you can turn it 
On again, uith 


3878 LPRINT TABS 697 “RANDOMIZE uS 


R 64970" 

39880 STOP 

8008 CLS : PRINT “This is an exa 
mpte of the boringotd Printing. 
What etse could uUeuant^?" 

8218 LPRINT AT 0,50;"Uell, we CO 
cnm wish for Proportional Printi 


a820 LPRINT "LOOK hou neat it is 
, and how easy it is t0 read!" 
8038 LPRINT "...Then, count how 
mang additional characters. ue 
can get on a tine. 


8040 LPRINT 
6856 LPRINT “REMEMBER... these th 
aracters are the SAME SIZE 


as -the standard Timex character 
Set, Ontuthe Spacing between the 
m has been ia ae 

. 8868 RETURN l 


This is an example of the borings 
Canto Ating Uhat etse could we 


as 


Well, we COULD Wish for Proportional printing; ` 
Look how neat it is, and how easy it is to read 
=Then, count how additional characters 
We Can get on a Line, 


REMEMBER...these e characters are the SAME 
SIZE as the standard Timex character set. Only 
thé spacing between them has been changed 


Optional Font Designer Program 


19 CLEAR 39999 

20 LET ba=4a000 
100 PRINT HT 2,2; “Ss 
130 FOR f=3 TO 10: PRINT AT f,3 
; NOOOOOOOORN": NEXT . 
xo PRINT Or tier Scere 
138 az z 

202 OVER 1: PRINT AT a43,bs4; "Ni 
"i PAUSE 2: PRINT RT as3,b«4; N" 
: PAUSE 2: OVER ð " 
210 LET aod SCONE ea ND a<? 
)-(INKEYSz"q" a» : 
220 LET babs CINKEYS="p™ AND b«7 
)-(INKEYSz"O" > 

230 IF INKEYs="m" THEN PRINT RT 
a43, bee: INVERSE.1;"X"; PLOT b+ 
168, (8-8) + f 
240 IF INKEYs£z"n" THEN PRINT AT 
at3abté; TOn: PLOT INUERSE 1;b+1 
69, (8-a) +1 

250 IF INKEYSz"f" THEN GO TO 30 


"260 IF INKEYse"d" THEN GO TO 48 
270 IF INKEY$="u" THEN GO TO 58 
7275 IF INKEYS="s" THEN GO TO 10 
-Eae IF INKEYss"j" THEN GO TO 10 


299 GO TO 200 
309 INPUT “Which Character? "3C. 


5 

210 IF LEN c$<¢>1 THEN GO -TO 300 
Set IF CODE cs«32 OR CODE cs>12 
7 THEN GO TD 362 

330 LET csCODE cs 

940 FOR f=8 TO 7 

350 POKE (c-S2) 28+f+ba,PEEK (1B 
468+(f42553): NEXT f: RUN 

«00 INPUT “Ohi Ch Character? “se 


5 
410 IF LEN c31 THEN GO TO 400 
420 IF CODE cs<32 OR CODE cs»512 
7 THEN GO TO 408 
436 POKE 23505,8584: POKE 23607,1 
55: PRINT AT 2,283 CS: POKE 23608 
,0: POKE 23607,6560. 
446 FOR a=8 TÓ 7: FOR bzsO TO 7 
€50 IF POINT (b41869,(8-a)24152)-2 
1 THEN PRINT AT 84+3,b44; INVERSE 

"X": GO TO 470 
450 PRINT AT 843, "de: "Qv 

NEXT 


678 NEXT |: AT 
LET bao: GO TO 228 

500 FEINE” aT 15,0;: FOR fz32 TO 

AES PTNT BRIGHT 2;CHRS fj“ "; 


501 PRINT AT 15,0; “7: OVER 1: 
FOR fz32 TO 127: boke’ 23506.54: 
POKE 23507,2155: PRINT BRIGHT 1; 
CHRS fi: POKE 23606,0: POKE 2350. 
7,60: PRINT " ux: NÉXT f: OVER 6 
: POKE 23506,0: POKE 23507,6090 

i E BEEP .1,1: PAUSE 0: PAUSE @ 


igos INPUT "File Name? “; f$: SAU 
E fSCODE 40090,768: RUN 
1020 INPUT "File Name? ";f$: LOA 
D f$CODE 40000,7868: RUN 


13 


10 REM Program to perform Prop 
ortional Printing. 

15 REM An upgraded version of 
an entry in “YOUR SPECTRUM", Nov 


_ 20 REM Changes include - Modif 
ied for TS2058, Supports TAB, be 
tter fonts, and works as in OVER 
@,. instead of OVER i 
. 25 REM When you RUN this progr 
am, it will SAVE the actual Prop 
ortionatl Print program to tape 
30 REM When THAT Program is ru 
n, all LPRINT statements will do 


Proportional printing to the sc _ 


reen. 

40 REM AT and TAB are supporte 
d, but they nou refer. to pixel P 
ositions, instead of character P 
oSitions. 

50 REM It will also be possibl 
e to use PRINT, to do non-Propor 
tional printing on the screen. 
- 68 GO TO 585 à 

780 REM Subroutine to decode th 
e following Hexadecimal DATA sta 


75 READ ns: LET hisCODE ns(4): 
LET to=CODE_ns (2) $ 
80 IF hi»57 THEN LET hishi-7 
. 85 IF tooS7-THEN LET lozio-7 

: 96 LET n=i6ehi+lo-6i6" 


.'985..RETURN t 
e DATE ecl ae F as eo" F "A8" j "22" ^ "E 
myu c£ gmpge ege cr oe 


110 intu. "Or" 5 "3a", "0 


fU , eqs i ES e EL 3 "6g" 


aée bata ires ue, "FO", OPE, eP. 
15e DATA “Fin "FE", "26", "22", "0 
160 Data Se ELE ebe", "PE", "1 
19g Data "Fb","22","Fe","FE","C 
E Date "o5" a r17,7387, "Eg", "F 
190° Bat “gén nce", MPE", "FE", "2 
poe Data Moe” nna". "Se". "8R" WE 
gie DATA- “POT NPE", "CS". “FE” "E 
eee age te * 
250 DATA "có" "Fi","RP","22","F 
24e DATA "gb" ,"20","99","CD","2 


E pate “có - 3 se 3e oe à os i2" 4 es ca oe ? oF 
260 DATE. “FED "80", "38", "02", "3 
- "SF m ose ie e" 


272 DATA "ef" A oe ii "29", ^29" , "E 

E "32" QUESO ISP 
28 - 

o eaw, "EE", "ei", "oT" ; "0 


269 DATA Rite san", "EA" RE" "P 
318 DATA nes P "CD" P "43", UE ; E 
320 DATA “cór, "ga" ,"26","32","E ` 


22","ÉB 

930 DATA "FE, 96", "08", "05", "2 
34o DATA "2B","22","EE","FE","65 
F” $ "SR", ABEL". "FE" 


H 


360 DATA "gó","28", 
BY. "Sb" 


@ DATA "CB, 730" 


oe uppge u oo ee 


380 DATA “a?! "ao", 


B" A "ED oe ; ""SB' j 
390 DATA "FE" "1A" 
2" E "CD oe i uc rdi " "Bg" 
400 DATA "S3R","ED", 
ig" 


4i@ Data "1A", "Ae", 
420 DATA Taa" EB", 
430 DATA "FE", "C1", 
ae cg 
"80", 
"ee", 
wea“ 
"80" 


em? 
"WC 


oe o D u at 


458 DATA "FÉ","FE", 


460 DATA "AB", "OR", 


“epen apr 


sae DATA non 799", 


o a OET tri 


m 3 ves. ; CFE”, D 7- 

560 CATA "CB"; “OF”, 
E" OF”, “EE” 5 'ea 

mm iy "SC", ae 


so DATA “Fin "gr" 


585 CLEAR 64199: PRINT AT 108i 


Sig DATA "ei". oes, 
"AT" 


530 DATA "S32","F6", 

e" ."Mag'.- LII 
s4o DATA “AF” i "32" 3 

sso pata "oé" "32", 


a» FE er 


"Bá", 


"mE 


"0, 
; "SA" : "E 


: "EE" 
"98", 


"B80"; 


— 

"ES", 

"ER", 

I ap one 

S70 DATA "FE", "SB", "67","8B","2. 
Pr 


"cB" 


"Ce" 


380 DATA "18","FR","mF","ap","g 
tigt, 
eB 
"F3", 
"Bit 


name " "2 
"SB" "C 
"ag" n "4. 


"d Lamar: 
QUEE n 
vage, "p 
ene ae 


os AF" , "93 


“32° i "E 
"ee" A "e 
“EQ 3 "0 


i 08^ i p 
Pa = Sas : "o 
epa", Rl 
"sa", "F, 


PALL s. A "o 


» "58" ; "E 


"EE" J "3 
"FEE" ? CDI ad 


“This Will Take a While...": 

NT ~e-Whu not take a break?” 
SSC REM zs2234343224254224RROGÓÓRG 
61g FOR j=64978 TO 65356: GO SU 


B 70: POKE jn: NEXT 


J 


700 REM Z3234254423424222232:4 444 
728 REM NOU that the machine CO 
ee iS in, wetll derive the compr 
essed fonts from the stanzard Ti 


mex. character set 


1000 LET addrzPEEK 38064256 £PEE 
K 236507495648: FEL daddrf =542293 


1010 FOR c=i TO 
1020 LET smin=i6 
1030 FOR x=1 TO 6G 


1040 LET LsPEEK addr: 


adres 


LET addfza 


1050 IF l«18 THEN LET s=16: GO T 


oO 1898 


i060 IF («32 THEN LET s=8: GO TO 


1090 à 
AS IF (<64 THEN LET sz4: 


ea TO - 


9 
4875 IF t<128 THEN LET sz2: GO T 


o 109€ 
1080 LET szi 


1090 IF s<smin THEN LET sminss 


1100 NEXT x 


111€ LET addrzaddr-8 


11290 FOR x=i TO 8 


1138 POKE daddr, (PEEK addr) *smin 
LET daddre 


1140 LET aadrzaddf +1: 


daddr+i 
4450 NEXT x 


